home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / unix / volume11 / graphedit / part01 next >
Encoding:
Internet Message Format  |  1987-10-05  |  47.9 KB
  1. Subject:  v11i097:  Graphcs editor for Suns, Part01/06
  2. Newsgroups: comp.sources.unix
  3. Sender: sources
  4. Approved: rs@uunet.UU.NET
  5.  
  6. Submitted-by: steinmetz!sbcs!nyfca1!chan (Douglas Chan)
  7. Posting-number: Volume 11, Issue 97
  8. Archive-name: graphedit/part01
  9.  
  10.   This is the first release of a graphic editor implemented for Suns
  11. running Sun 3.2 or latter.  Some minor changes are necessary to run it on
  12. Sun 3.0 (mostly on the device dependent part, eg. anything related
  13. to cg4dd()) and I did not do it because there is no Sun running 3.0 here.
  14.  
  15. Features of the current program include:
  16.   1) display and edit of diagram with SunCore
  17.   2) select operations and options on control pad in SunView
  18.   3) save/load of diagram in PostScript
  19.   4) output of diagram in rasterfile(5), plot(5) and pic(1) format
  20.   5) draw lines, polygon, circle, ellipse, arc, rectangle, text
  21.      and freehand
  22.   6) operations on 'segments' include create, edit, save, load, copy,
  23.      move, rotate, scale, join, break, delete and undelete
  24.   7) can specify line width, linestyle, font, character size, and greylevel
  25.   8) grid and alignment
  26.   9) options to specify how to place diagram on 8.5 x 11 paper (PostScript only)
  27.  10) global scale of diagram
  28.  
  29.   More information is in README and graphedit.l (manual page).
  30.  
  31.   Have fun!!!
  32.  
  33. Douglas Chan.
  34.  
  35. Address: Computer Science Department
  36.          State University of New York at Stony Brook
  37.          Stony Brook, NY 11794
  38.  
  39. csnet address: chan@sbcs.csnet
  40. uucp address: {allegra,philabs,pyramid}!sbcs!chan
  41.  
  42. ---------Cut Here--------Cut Here--------Cut Here--------Cut Here--------
  43. # This is a shell archive.  Remove anything before this line,
  44. # then unpack it by saving it in a file and typing "sh file".
  45. #
  46. # Contents:  README Makefile display.h panel.c savepanel.c
  47.  
  48. echo x - README
  49. sed 's/^@//' > "README" <<'@//E*O*F README//'
  50.  
  51.   @(#)README    1.1 6/8/87 Copyright 1987 SBCS-chan
  52.  
  53. ******************************************************************************
  54.  
  55.           (c) Copyright 1987 
  56.  
  57.           Lap-Tak Chan
  58.           Computer Science Department
  59.           State University of New York at Stony Brook
  60.           Stony Brook, NY 11794
  61.  
  62.     This software and its documentation may be used, copied, and
  63.   distributed, provided that this legend appear in all copies and
  64.   that it is not copied or distributed for a profit.
  65.  
  66.   No representations is made about the suitability of this software
  67.   for any purpose.  It is provided "as is" with no support and no
  68.   express or implied warranty.
  69.  
  70. ******************************************************************************
  71.  
  72.   graphedit is a general purpose graphic editor for Sun workstations.
  73. It was implemented on Sun-3s running Sun release 3.2 with SunView
  74. and SunCore.  Some changes on core.c are necessary to run it on
  75. Sun 3.0.
  76.  
  77.   Features of the current version of graphedit include:
  78.  
  79.   1) display and edit of diagram with SunCore
  80.   2) select operations and options on control pad in SunView
  81.   3) save/load of diagram in PostScript
  82.   4) output of diagram in rasterfile(5), plot(5) and pic(1) format
  83.   5) draw lines, polygon, circle, ellipse, arc, rectangle, text
  84.      and freehand
  85.   6) operations on 'segments' include create, edit, save, load, copy,
  86.      move, rotate, scale, join, break, delete and undelete
  87.   7) can specify line width, linestyle, font, character size, and greylevel
  88.   8) grid and alignment
  89.   9) options to specify how to place diagram on 8.5 x 11 paper (PostScript only)
  90.  10) global scale of diagram
  91.  11) usage and message panel to display messages and "how-to"s
  92.  12) many other options
  93.  
  94.   Files in this directory include:
  95. README                you are reading it
  96. display.h             include file used by all c files
  97. draw.c                editing routines
  98. core.c                SunCore interface
  99. display.c             maintain display list for storage of diagram
  100. panel.c               create control pad
  101. savepanel.c           create options window
  102. misc.c                some math routines
  103. optmize.c             internal optimizer
  104. ps.c                  save/load diagram/segment in PostScript
  105. pic.c                 output diagram for pic(1)
  106. plot.c                output diagram in plot(5)
  107. optm.c                driver for internal optimizer
  108. ps2pic.c              driver to convert saved diagram to pic(1)
  109. ps2plot.c             driver to convert saved diagram to plot(1)
  110. images                directory for icon and images created by iconedit(1)
  111. Makefile              makefile for graphedit
  112. ps.head               header file for saved diagram (in PostScript)
  113. graphedit.l           manual page
  114.  
  115.   To install it, set the parameters at the beginning of Makefile and do
  116.     make install
  117. More information on the installation is available in Makefile.
  118.  
  119.   You may modify the source to fix bugs and port it for any new Sun
  120. hardware (e.g. cgfive0).  Please send any fixes to me at chan@sbcs.csnet
  121. or {allegra,philabs,pyramid}!sbcs!chan so I can add them to future
  122. releases.
  123.  
  124.   There is ongoing effort to add more advance editing functions
  125. and primitives to graphedit, and to improve the existing
  126. functions.  Please do not modify the source for any enhancement
  127. to avoid duplicate efforts and any difficulty on combining
  128. the enhancement to future releases.  You are welcome to send
  129. suggestions to me at the email addresses above.
  130. @//E*O*F README//
  131. chmod u=r,g=r,o=r README
  132.  
  133. echo x - Makefile
  134. sed 's/^@//' > "Makefile" <<'@//E*O*F Makefile//'
  135. #
  136. # @(#)Makefile    1.2 6/8/87 Copyright 1987 SBCS-chan
  137. # 
  138. #******************************************************************************
  139. #
  140. #          (c) Copyright 1987 
  141. #
  142. #          Lap-Tak Chan
  143. #          Computer Science Department
  144. #          State University of New York at Stony Brook
  145. #          Stony Brook, NY 11794
  146. #
  147. #    This software and its documentation may be used, copied, and
  148. #  distributed, provided that this legend appear in all copies and
  149. #  that it is not copied or distributed for a profit.
  150. #
  151. #  No representations is made about the suitability of this software
  152. #  for any purpose.  It is provided "as is" with no support and no
  153. #  express or implied warranty.
  154. #
  155. #******************************************************************************
  156.  
  157. #
  158. #  To install graphedit, set the proper value of the following parameters
  159. #  and do 'make install':
  160. #    LIB - existing directory where the header file will be installed
  161. #    BIN - existing directory to install the binaries
  162. #    BINARIES - what binaries to make
  163. #    CFLAGS - C compiler options
  164. #    LFLAGS - libraries, 'core' may be changed to 'corefpa' or 'core68881'
  165. #             for different floating point options
  166. #
  167. #  ps2pic, optm, ps2plot are optional filters which take a saved PostScript
  168. #  diagram from standard input and produce pic output, optimized PostScript,
  169. #  and plot output on stardard output respectively.
  170. #
  171. #  graphedit.l should be installed manually because of differnet ways to
  172. #  handle local manual pages at different sites.
  173. #
  174. LIB=/usr/local/lib
  175.  
  176. BIN=/usr/local/bin
  177.  
  178. BINARIES=graphedit ps2pic optm ps2plot
  179.  
  180. CFLAGS=-DGE_DEFAULTLIB=\"$(LIB)\" -O -fswitch -s
  181.  
  182. LFLAGS=-lcore -lsuntool -lsunwindow -lpixrect -lplot -lm
  183.  
  184. OBJ=draw.o panel.o core.o display.o ps.o savepanel.o pic.o plot.o optmize.o misc.o
  185.  
  186. OPTMOBJ=optm.o ps.o display.o optmize.o
  187.  
  188. PS2PLOTOBJ=ps2plot.o plot.o ps.o display.o misc.o
  189.  
  190. PS2PICOBJ=ps2pic.o pic.o ps.o display.o misc.o
  191.  
  192. BACKUP=/u7/sr/chan/backup/newdraw
  193.  
  194. FILES=README Makefile display.h draw.c panel.c core.c display.c ps.c savepanel.c pic.c plot.c optmize.c misc.c ps2pic.c ps2plot.c optm.c images images/* ps.head graphedit.l
  195.  
  196. make: $(BINARIES)
  197.  
  198. graphedit: ${OBJ}
  199.     cc ${CFLAGS} -o graphedit ${OBJ} ${LFLAGS}
  200.  
  201. ps2pic: ${PS2PICOBJ}
  202.     cc ${CFLAGS} -o ps2pic ${PS2PICOBJ} -lm
  203.  
  204. optm: ${OPTMOBJ}
  205.     cc ${CFLAGS} -o optm ${OPTMOBJ}
  206.  
  207. ps2plot: ${PS2PLOTOBJ}
  208.     cc ${CFLAGS} -o ps2plot ${PS2PLOTOBJ} -lplot -lm
  209.  
  210. all: graphedit ps2pic optm ps2plot
  211.  
  212. install: ${BINARIES}
  213.     /bin/cp -p ${BINARIES} ${BIN}
  214.     /bin/cp -p ps.head ${LIB}
  215.  
  216. backup:
  217.     tar cf ${BACKUP} ${FILES} SCCS
  218.  
  219. shar:
  220.     ./makeshar
  221.  
  222. clean:
  223.     /bin/rm -f ${OBJ} ${OPTMOBJ} ${PS2PICOBJ} ${PS2PLOTOBJ} ${BINARIES}
  224. @//E*O*F Makefile//
  225. chmod u=rw,g=r,o=r Makefile
  226.  
  227. echo x - display.h
  228. sed 's/^@//' > "display.h" <<'@//E*O*F display.h//'
  229.  
  230. /* @(#)display.h    1.2    6/8/87 Copyright 1987 SBCS-chan */
  231.  
  232. /*****************************************************************************
  233.  
  234.           (c) Copyright 1987 
  235.  
  236.           Lap-Tak Chan
  237.           Computer Science Department
  238.           State University of New York at Stony Brook
  239.           Stony Brook, NY 11794
  240.  
  241.     This software and its documentation may be used, copied, and
  242.   distributed, provided that this legend appear in all copies and
  243.   that it is not copied or distributed for a profit.
  244.  
  245.   No representations is made about the suitability of this software
  246.   for any purpose.  It is provided "as is" with no support and no
  247.   express or implied warranty.
  248.  
  249. *****************************************************************************/
  250.  
  251. /*****************************************************************************
  252.  
  253.                              display.h
  254.  
  255.    This file defines the constants and structures for graphedit.
  256.  
  257. *****************************************************************************/
  258.  
  259. #define GE_VERSION "1.1" /* current version of graphedit */
  260.  
  261. /* display instructions */
  262. #define GE_MOVE    1    /* move */
  263. #define GE_LINE 2    /* line */
  264. #define GE_PLOT 3    /* move and intensify at end of stroke */
  265. #define GE_POLYLINE 4    /* polyline */
  266. #define GE_POLYGON 5    /* polygon */
  267. #define GE_TEXT 6    /* text */
  268. #define GE_ARC 7    /* arc */
  269. #define GE_CIRCLE 8    /* circle */
  270. #define GE_ELLIPSE 9    /* ellipse */
  271. #define GE_CONT 10    /* continue of point list of last polygon/polyline */
  272. #define GE_ARCEXT 11    /* extension for arc */
  273. #define GE_SETCOLOR 20    /* change color attribute */
  274. #define GE_SETTYPELINE 21    /* change line style */
  275. #define GE_SETLINEWIDTH 22    /* change line width */
  276. #define GE_SETFONT 23    /* change font */
  277. #define GE_TRANSLATE 24
  278. #define GE_ROTATE 25
  279. #define GE_SCALE 26
  280. #define GE_SETCHARSIZE 27 /* change character size */
  281. #define GE_FILL 28    /* border/fill */
  282. #define GE_NEW 31    /* beginning of new segment */
  283. #define GE_DELETE 32    /* delete old segment */
  284. #define GE_CLOSE 33    /* close a segment */
  285.  
  286. /* parameters for border/fill */
  287. #define GE_BORDERONLY 0
  288. #define GE_FILLONLY 1
  289. #define GE_FILLBORDER 2
  290.  
  291. #define MAXUNDELETE 10 /* maximum number of segments which can be undeleted */
  292.  
  293. #define GE_OPENMAX 512    /* maximum number of opened segemnts at any time */
  294.  
  295. /* sample segments */
  296. #define GE_COLOR_SAMPLE 1    /* show different color */
  297. #define GE_LINE_SAMPLE 2    /* show different linewidth and linestyle */
  298. #define GE_CHAR_SAMPLE 3    /* show different character size and font */
  299. #define GE_GRID 4    /* grid */
  300. #define GE_CIRCLE_SAMPLE 5    /* used to draw ellipse/circle */
  301. #define GE_CROSSHAIR 6    /* echo at location read */
  302. #define GE_ARC_SAMPLE 7    /* used to draw arc */
  303. #define GE_MIN_SEG 10    /* lowest segment number available to user */
  304.  
  305. /* define size of window in world coordinate */
  306. #define GE_WIN_X 511.
  307. #define GE_WIN_Y 383.
  308.  
  309. #define GE_DEFAULT_GRID 10.
  310. #define GE_MIN_GRID 5.
  311. #define GE_DEFAULT_CHARSIZE 8
  312. #define GE_DEFAULT_RADIUS 10.
  313. #define PI 3.1415927
  314.  
  315. /* define how picture will be positioned on 8.5 x 11 paper */
  316. struct saveattr {
  317.   int fix;    /* 0 - Scale, 1 - Fix Width, 2 - Fix Height */
  318.   int rotate;    /* whether picture is rotated 90 degree */
  319.   int width;    /* width of picture, independent to rotate */
  320.   int height;    /* height of picture, independent to rotate */
  321.   int center;    /* whether picture is centered on paper */
  322.   int offa;    /* horizontal offset */
  323.   int offb;    /* vertical offset */
  324. };
  325.  
  326. /* define attributes of a segment */
  327. struct attr {
  328.   float tx, ty;    /* translation in world coordinate */
  329.   float ang;    /* angle of rotation in radian */
  330.   float sx, sy;    /* scaling factor */
  331.   int color;    /* color in 0-11 from light to dark*/
  332.   int linestyle;/* line style, 0 - solid, 1 - dotted, 2 - dashed, 3 - dotdash */
  333.   int linewidth;/* line width */
  334.   int font;    /* font, 0 - Courier, 1 - Roman, 2- Greek, 3 - BoldItalic,
  335.                    4 - Bold */
  336.   int charsize;    /* character size */
  337.   int drawn;    /* whether segment was drawn by ge_draw */
  338.   int deleted;    /* whether segment was marked as deleted */
  339. };
  340.  
  341. /* a display item */
  342. struct list_item {
  343.   int instr;  /* display instruction (move, plot, line, etc) */
  344.   float x,y;  /* display coordinate (or other parameters) */
  345.   struct list_item *next; /* point to next display item */
  346. };
  347.  
  348. /* display list of a segment */
  349. struct list {
  350.   int segno; /* segment number */
  351.   struct list_item *d_list; /* list of display items */
  352.   int next; /* point to next segment */
  353.   struct attr attr; /* attributes of segment */
  354. };
  355. @//E*O*F display.h//
  356. chmod u=r,g=r,o=r display.h
  357.  
  358. echo x - panel.c
  359. sed 's/^@//' > "panel.c" <<'@//E*O*F panel.c//'
  360.  
  361. static char SccsId[] = "@(#)panel.c    1.2 6/8/87 Copyright 1987 SBCS-chan";
  362.  
  363. /*****************************************************************************
  364.  
  365.           (c) Copyright 1987 
  366.  
  367.           Lap-Tak Chan
  368.           Computer Science Department
  369.           State University of New York at Stony Brook
  370.           Stony Brook, NY 11794
  371.  
  372.     This software and its documentation may be used, copied, and
  373.   distributed, provided that this legend appear in all copies and
  374.   that it is not copied or distributed for a profit.
  375.  
  376.   No representations is made about the suitability of this software
  377.   for any purpose.  It is provided "as is" with no support and no
  378.   express or implied warranty.
  379.  
  380. *****************************************************************************/
  381.  
  382. /*****************************************************************************
  383.  
  384.                           Control Pad
  385.                           ===========
  386.  
  387.     This file contains routines for making and maintaining the control
  388.   pad of graphedit.
  389.  
  390. *****************************************************************************/
  391.  
  392. #include <suntool/sunview.h>
  393. #include <suntool/panel.h>
  394. #include "display.h"
  395.  
  396. /* external notify procedures for panel items in the control pad */
  397. extern void do_new_seg(), do_del_seg(),
  398.               do_align(), do_grid(),
  399.               do_polyline(),do_circle(),do_rect(),
  400.               do_polygon(), do_text(), do_pos(),
  401.               do_rot(), do_size(), do_attributes(), do_save_seg(),
  402.               do_restore_seg(), do_exit(), do_save_pic(), do_restore_pic(),
  403.               do_change_color(), do_change_linewidth(), do_change_linestyle(),
  404.               do_chg_xformchar(), do_change_font(), ge_refresh(), do_undelete(),
  405.               do_confirm_exit(), do_copy_segment(), do_break(), do_arc(),
  406.               do_change_grid(), do_edit_seg(), do_change_charsize(),
  407.               do_join(), do_clear(), do_trace(), do_ellipse(), do_output(),
  408.               do_global_scale();
  409.  
  410. void do_show_save();
  411.  
  412. /* exported panel items for draw.c */
  413. Panel_item text_filen, text_textstr, mesg_display, mesg_usage;
  414. Panel_item slider_linewidth, menu_linestyle, menu_font, slider_color,
  415.            cycle_grid, cycle_align, cycle_fill,
  416.            slider_gridx, slider_gridy, slider_charsize, cycle_save;
  417.  
  418. /* define pixrect images for the panel items */
  419.   static short polyline_pr_image[]={
  420. #include "images/polyline.pr"
  421.   };
  422.  
  423.   static short polygon_pr_image[]={
  424. #include "images/polygon.pr"
  425.   };
  426.  
  427.   static short circle_pr_image[]={
  428. #include "images/circle.pr"
  429.   };
  430.  
  431.   static short rect_pr_image[]={
  432. #include "images/rect.pr"
  433.   };
  434.  
  435.   static short trace_pr_image[]={
  436. #include "images/trace.pr"
  437.   };
  438.  
  439.   static short ellipse_pr_image[]={
  440. #include "images/ellipse.pr"
  441.   };
  442.  
  443.   static short arc_pr_image[]={
  444. #include "images/arc.pr"
  445.   };
  446.  
  447.   static short text_pr_image[]={
  448. #include "images/text.pr"
  449.   };
  450.  
  451.   static short border_pr_image[]={
  452. #include "images/border.pr"
  453.   };
  454.  
  455.   static short fill_pr_image[]={
  456. #include "images/fill.pr"
  457.   };
  458.  
  459.   static short borderfill_pr_image[]={
  460. #include "images/borderfill.pr"
  461.   };
  462.  
  463.   static short solid_pr_image[]={
  464. #include "images/solid.pr"
  465.   };
  466.  
  467.   static short dot_pr_image[]={
  468. #include "images/dot.pr"
  469.   };
  470.  
  471.   static short dash_pr_image[]={
  472. #include "images/dash.pr"
  473.   };
  474.  
  475.   static short dotdash_pr_image[]={
  476. #include "images/dotdash.pr"
  477.   };
  478.  
  479.   mpr_static(polyline_pr, 16, 16, 1, polyline_pr_image);
  480.   mpr_static(polygon_pr, 16, 16, 1, polygon_pr_image);
  481.   mpr_static(circle_pr, 16, 16, 1, circle_pr_image);
  482.   mpr_static(rect_pr, 16, 16, 1, rect_pr_image);
  483.   mpr_static(trace_pr, 16, 16, 1, trace_pr_image);
  484.   mpr_static(ellipse_pr, 16, 16, 1, ellipse_pr_image);
  485.   mpr_static(arc_pr, 16, 16, 1, arc_pr_image);
  486.   mpr_static(text_pr, 16, 16, 1, text_pr_image);
  487.   mpr_static(border_pr, 64, 14, 1, border_pr_image);
  488.   mpr_static(fill_pr, 64, 14, 1, fill_pr_image);
  489.   mpr_static(borderfill_pr, 64, 14, 1, borderfill_pr_image);
  490.   mpr_static(solid_pr, 64, 14, 1, solid_pr_image);
  491.   mpr_static(dot_pr, 64, 14, 1, dot_pr_image);
  492.   mpr_static(dash_pr, 64, 14, 1, dash_pr_image);
  493.   mpr_static(dotdash_pr, 64, 14, 1, dotdash_pr_image);
  494.  
  495. /*****************************************************************************
  496.  
  497.     make_control_panel will create the message panel, main panel, segment
  498.   panel, primitive panel and attribute panel in frame.  Each panel will
  499.   have a number of panel items in it.
  500.  
  501.   Input
  502.     frame - the frame to create the panels in
  503.  
  504. *****************************************************************************/
  505.  
  506. make_control_panel(frame)
  507. Frame frame;
  508. {
  509.   Panel panels[5];
  510. #define mesg_panel panels[0]
  511. #define main_panel panels[1]
  512. #define seg_panel  panels[2]
  513. #define draw_panel panels[3]
  514. #define attr_panel panels[4]
  515.  
  516.   /* panel items known internally */
  517.   Panel_item but_new_seg, but_del_seg, but_clear,
  518.              but_polyline, but_polygon, but_circle, but_rect,
  519.              but_text, but_pos, but_rot, but_size, but_join, but_undelete,
  520.              but_attributes, but_save_seg, but_restore_seg, but_edit_seg,
  521.              but_exit, but_save_pic, but_restore_pic, but_redisplay,
  522.              but_copy_seg, cycle_grid, cycle_align, but_break, but_trace,
  523.              but_ellipse, but_output, but_arc, but_glbscale;
  524.  
  525.   /* create the message panel */
  526.   mesg_panel=window_create(frame, PANEL, 0);
  527.  
  528.   /* item for the message */
  529.   mesg_display=panel_create_item(mesg_panel, PANEL_MESSAGE,
  530.                PANEL_LABEL_STRING, " ",
  531.                PANEL_LABEL_BOLD, TRUE,               
  532.                PANEL_ITEM_Y, ATTR_ROW(0),
  533.                0);
  534.  
  535.   /* item for the usage */
  536.   mesg_usage=panel_create_item(mesg_panel, PANEL_MESSAGE,
  537.                PANEL_LABEL_STRING, " ",
  538.                PANEL_ITEM_X, ATTR_COL(0),
  539.                PANEL_ITEM_Y, ATTR_ROW(1),
  540.                0);
  541.  
  542.   window_fit(mesg_panel);
  543.  
  544.   /* create the main panel */
  545.   main_panel=window_create(frame, PANEL,
  546.                WIN_BELOW, mesg_panel,
  547.                WIN_X, ATTR_COLS(0),
  548.                0);
  549.  
  550.   /* save button */
  551.   but_save_pic=panel_create_item(main_panel, PANEL_BUTTON,
  552.                PANEL_LABEL_IMAGE, panel_button_image(main_panel,
  553.                "Save",
  554.                4,0),
  555.                PANEL_ITEM_X, ATTR_COL(0),
  556.                PANEL_ITEM_Y, ATTR_ROW(0),
  557.                PANEL_NOTIFY_PROC, do_save_pic,
  558.                0);
  559.  
  560.   /* load button */
  561.   but_restore_pic=panel_create_item(main_panel, PANEL_BUTTON,
  562.                PANEL_LABEL_IMAGE, panel_button_image(main_panel,
  563.                "Load",
  564.                4,0),
  565.                PANEL_ITEM_X, ATTR_COL(6),
  566.                PANEL_ITEM_Y, ATTR_ROW(0),
  567.                PANEL_NOTIFY_PROC, do_restore_pic,
  568.                0);
  569.  
  570.   /* redisplay button */
  571.   but_redisplay=panel_create_item(main_panel, PANEL_BUTTON,
  572.                PANEL_LABEL_IMAGE, panel_button_image(main_panel,
  573.            "Redisplay",
  574.                9,0),
  575.                PANEL_ITEM_X, ATTR_COL(12),
  576.                PANEL_ITEM_Y, ATTR_ROW(0),
  577.                PANEL_NOTIFY_PROC, ge_refresh,
  578.                0);
  579.  
  580.   /* quit button */
  581.   but_exit=panel_create_item(main_panel, PANEL_BUTTON,
  582.                PANEL_LABEL_IMAGE, panel_button_image(main_panel,
  583.                "Quit",
  584.                4,0),
  585.                PANEL_ITEM_X, ATTR_COL(23),
  586.                PANEL_ITEM_Y, ATTR_ROW(0),
  587.                PANEL_NOTIFY_PROC, do_confirm_exit,
  588.                0);
  589.  
  590.   /* clear button */
  591.   but_clear=panel_create_item(main_panel, PANEL_BUTTON,
  592.                PANEL_LABEL_IMAGE, panel_button_image(main_panel,
  593.                "Clear",
  594.                5,0),
  595.                PANEL_ITEM_X, ATTR_COL(29),
  596.                PANEL_ITEM_Y, ATTR_ROW(0),
  597.                PANEL_NOTIFY_PROC, do_clear,
  598.                0);
  599.  
  600.   /* scale button */
  601.   but_glbscale=panel_create_item(main_panel, PANEL_BUTTON,
  602.                PANEL_LABEL_IMAGE, panel_button_image(main_panel,
  603.                "Scale",
  604.                5,0),
  605.                PANEL_ITEM_X, ATTR_COL(36),
  606.                PANEL_ITEM_Y, ATTR_ROW(0),
  607.                PANEL_NOTIFY_PROC, do_global_scale,
  608.                0);
  609.  
  610.   /* output button */
  611.   but_output=panel_create_item(main_panel, PANEL_BUTTON,
  612.                PANEL_LABEL_IMAGE, panel_button_image(main_panel,
  613.                "Output",
  614.                6,0),
  615.                PANEL_ITEM_X, ATTR_COL(0),
  616.                PANEL_ITEM_Y, ATTR_ROW(1),
  617.                PANEL_NOTIFY_PROC, do_output,
  618.                0);
  619.  
  620.   /* file name field */
  621.   text_filen=panel_create_item(main_panel, PANEL_TEXT,
  622.                PANEL_LABEL_STRING, "File:",
  623.                PANEL_VALUE_DISPLAY_LENGTH, 30,
  624.                PANEL_ITEM_X, ATTR_COL(8),
  625.                PANEL_ITEM_Y, ATTR_ROW(1),
  626.                0);
  627.  
  628.   window_fit(main_panel);
  629.  
  630.   /* create the segment panel */
  631.   seg_panel=window_create(frame, PANEL,
  632.                WIN_BELOW, main_panel,
  633.                WIN_X, ATTR_COLS(0),
  634.                0);
  635.  
  636.   /* create button */
  637.   but_new_seg=panel_create_item(seg_panel, PANEL_BUTTON,
  638.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  639.                "Create",
  640.                6,0),
  641.                PANEL_NOTIFY_PROC, do_new_seg,
  642.                PANEL_ITEM_X, ATTR_COL(0),
  643.                PANEL_ITEM_Y, ATTR_ROW(0),
  644.                0);
  645.  
  646.   /* edit button */
  647.   but_edit_seg=panel_create_item(seg_panel, PANEL_BUTTON,
  648.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  649.                "Edit",
  650.                4,0),
  651.                PANEL_ITEM_X, ATTR_COL(8),
  652.                PANEL_ITEM_Y, ATTR_ROW(0),
  653.                PANEL_NOTIFY_PROC, do_edit_seg,
  654.                0);
  655.  
  656.   /* delete button */
  657.   but_del_seg=panel_create_item(seg_panel, PANEL_BUTTON,
  658.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  659.                "Delete",
  660.                6,0),
  661.                PANEL_ITEM_X, ATTR_COL(14),
  662.                PANEL_ITEM_Y, ATTR_ROW(0),
  663.                PANEL_NOTIFY_PROC, do_del_seg,
  664.                0);
  665.  
  666.   /* save button */
  667.   but_save_seg=panel_create_item(seg_panel, PANEL_BUTTON,
  668.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  669.                "Save",
  670.                4,0),
  671.                PANEL_ITEM_X, ATTR_COL(22),
  672.                PANEL_ITEM_Y, ATTR_ROW(0),
  673.                PANEL_NOTIFY_PROC, do_save_seg,
  674.                0);
  675.  
  676.   /* load button */
  677.   but_restore_seg=panel_create_item(seg_panel, PANEL_BUTTON,
  678.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  679.                "Load",
  680.                4,0),
  681.                PANEL_ITEM_X, ATTR_COL(28),
  682.                PANEL_ITEM_Y, ATTR_ROW(0),
  683.                PANEL_NOTIFY_PROC, do_restore_seg,
  684.                0);
  685.  
  686.   /* copy button */
  687.   but_copy_seg=panel_create_item(seg_panel, PANEL_BUTTON,
  688.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  689.            "Copy",
  690.                4,0),
  691.                PANEL_ITEM_X, ATTR_COL(34),
  692.                PANEL_ITEM_Y, ATTR_ROW(0),
  693.                PANEL_NOTIFY_PROC, do_copy_segment,
  694.                0);
  695.  
  696.   /* move button */
  697.   but_pos=panel_create_item(seg_panel, PANEL_BUTTON,
  698.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  699.                "Move",
  700.                4,0),
  701.                PANEL_ITEM_X, ATTR_COL(0),
  702.                PANEL_ITEM_Y, ATTR_ROW(1),
  703.                PANEL_NOTIFY_PROC, do_pos,
  704.                0);
  705.  
  706.   /* rotate button */
  707.   but_rot=panel_create_item(seg_panel, PANEL_BUTTON,
  708.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  709.                "Rotate",
  710.                6,0),
  711.                PANEL_ITEM_X, ATTR_COL(6),
  712.                PANEL_ITEM_Y, ATTR_ROW(1),
  713.                PANEL_NOTIFY_PROC, do_rot,
  714.                0);
  715.  
  716.   /* scale button */
  717.   but_size=panel_create_item(seg_panel, PANEL_BUTTON,
  718.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  719.                "Scale",
  720.                5,0),
  721.                PANEL_ITEM_X, ATTR_COL(14),
  722.                PANEL_ITEM_Y, ATTR_ROW(1),
  723.                PANEL_NOTIFY_PROC, do_size,
  724.                0);
  725.  
  726.   /* join button */
  727.   but_join=panel_create_item(seg_panel, PANEL_BUTTON,
  728.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  729.                "Join",
  730.                4,0),
  731.                PANEL_ITEM_X, ATTR_COL(21),
  732.                PANEL_ITEM_Y, ATTR_ROW(1),
  733.                PANEL_NOTIFY_PROC, do_join,
  734.                0);
  735.  
  736.   /* break button */
  737.   but_break=panel_create_item(seg_panel, PANEL_BUTTON,
  738.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  739.                "Break",
  740.                5,0),
  741.                PANEL_ITEM_X, ATTR_COL(27),
  742.                PANEL_ITEM_Y, ATTR_ROW(1),
  743.                PANEL_NOTIFY_PROC, do_break,
  744.                0);
  745.  
  746.   /* undelete button */
  747.   but_undelete=panel_create_item(seg_panel, PANEL_BUTTON,
  748.                PANEL_LABEL_IMAGE, panel_button_image(seg_panel,
  749.                "Undelete",
  750.                4,0),
  751.                PANEL_ITEM_X, ATTR_COL(34),
  752.                PANEL_ITEM_Y, ATTR_ROW(1),
  753.                PANEL_NOTIFY_PROC, do_undelete,
  754.                0);
  755.  
  756.   window_fit(seg_panel);
  757.  
  758.   /* create the primitive panel */
  759.   draw_panel=window_create(frame, PANEL,
  760.                WIN_BELOW, seg_panel,
  761.                WIN_X, ATTR_COLS(0),
  762.                0);
  763.  
  764.   /* polyline button */
  765.   but_polyline=panel_create_item(draw_panel, PANEL_BUTTON,
  766.                PANEL_LABEL_IMAGE, &polyline_pr,
  767.                PANEL_NOTIFY_PROC, do_polyline,
  768.                PANEL_ITEM_X, ATTR_COL(0),
  769.                PANEL_ITEM_Y, ATTR_ROW(0),
  770.                0);
  771.  
  772.   /* polygon button */
  773.   but_polygon=panel_create_item(draw_panel, PANEL_BUTTON,
  774.                PANEL_LABEL_IMAGE, &polygon_pr,
  775.                PANEL_ITEM_X, ATTR_COL(4),
  776.                PANEL_ITEM_Y, ATTR_ROW(0),
  777.                PANEL_NOTIFY_PROC, do_polygon,
  778.                0);
  779.  
  780.   /* circle button */
  781.   but_circle=panel_create_item(draw_panel, PANEL_BUTTON,
  782.                PANEL_LABEL_IMAGE, &circle_pr,
  783.                PANEL_ITEM_X, ATTR_COL(8),
  784.                PANEL_ITEM_Y, ATTR_ROW(0),
  785.                PANEL_NOTIFY_PROC, do_circle,
  786.                0);
  787.  
  788.   /* rectangle button */
  789.   but_rect=panel_create_item(draw_panel, PANEL_BUTTON,
  790.                PANEL_LABEL_IMAGE, &rect_pr,
  791.                PANEL_ITEM_X, ATTR_COL(12),
  792.                PANEL_ITEM_Y, ATTR_ROW(0),
  793.                PANEL_NOTIFY_PROC, do_rect,
  794.                0);
  795.  
  796.   /* trace button */
  797.   but_trace=panel_create_item(draw_panel, PANEL_BUTTON,
  798.                PANEL_LABEL_IMAGE, &trace_pr,
  799.                PANEL_ITEM_X, ATTR_COL(16),
  800.                PANEL_ITEM_Y, ATTR_ROW(0),
  801.                PANEL_NOTIFY_PROC, do_trace,
  802.                0);
  803.  
  804.   /* ellipse button */
  805.   but_ellipse=panel_create_item(draw_panel, PANEL_BUTTON,
  806.                PANEL_LABEL_IMAGE, &ellipse_pr,
  807.                PANEL_NOTIFY_PROC, do_ellipse,
  808.                PANEL_ITEM_X, ATTR_COL(20),
  809.                PANEL_ITEM_Y, ATTR_ROW(0),
  810.                0);
  811.  
  812.   /* arc button */
  813.   but_arc=panel_create_item(draw_panel, PANEL_BUTTON,
  814.                PANEL_LABEL_IMAGE, &arc_pr,
  815.                PANEL_NOTIFY_PROC, do_arc,
  816.                PANEL_ITEM_X, ATTR_COL(24),
  817.                PANEL_ITEM_Y, ATTR_ROW(0),
  818.                0);
  819.  
  820.   /* text button */
  821.   but_text=panel_create_item(draw_panel, PANEL_BUTTON,
  822.                PANEL_LABEL_IMAGE, &text_pr,
  823.                PANEL_NOTIFY_PROC, do_text,
  824.                PANEL_ITEM_X, ATTR_COL(0),
  825.                PANEL_ITEM_Y, ATTR_ROW(0)+20,
  826.                0);
  827.  
  828.   /* text field */
  829.   text_textstr=panel_create_item(draw_panel, PANEL_TEXT,
  830.                  PANEL_LABEL_STRING, ":",
  831.                  PANEL_VALUE_DISPLAY_LENGTH, 30,
  832.                  PANEL_ITEM_Y, ATTR_ROW(0)+20,
  833.                  PANEL_ITEM_X, ATTR_COL(3),
  834.                  0);
  835.  
  836.   window_fit(draw_panel);
  837.  
  838.   /* create the attribute panel */
  839.   attr_panel=window_create(frame, PANEL,
  840.                WIN_BELOW, draw_panel,
  841.                WIN_X, ATTR_COLS(0),
  842.                0);
  843.  
  844.   /* line width slider */
  845.   slider_linewidth=panel_create_item(attr_panel, PANEL_SLIDER,
  846.                PANEL_LABEL_STRING, "Line width:",
  847.                PANEL_VALUE, 0,
  848.                PANEL_MIN_VALUE, 0,
  849.                PANEL_MAX_VALUE, 99,
  850.                PANEL_SHOW_VALUE, TRUE,
  851.                PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  852.                PANEL_ITEM_X, ATTR_COL(0),
  853.                PANEL_ITEM_Y, ATTR_ROW(0),
  854.                PANEL_NOTIFY_PROC, do_change_linewidth,
  855.                0);
  856.  
  857.   /* slider for grid interval along x axis */
  858.   slider_gridx=panel_create_item(attr_panel, PANEL_SLIDER,
  859.                PANEL_LABEL_STRING, "Grid interval: x",
  860.                PANEL_VALUE, (int) GE_DEFAULT_GRID,
  861.                PANEL_MIN_VALUE, (int) GE_MIN_GRID,
  862.                PANEL_MAX_VALUE, (int) (GE_WIN_X/10),
  863.                PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  864.                PANEL_ITEM_X, ATTR_COL(0),
  865.                PANEL_ITEM_Y, ATTR_ROW(1),
  866.                PANEL_NOTIFY_PROC, do_change_grid,
  867.                0);
  868.  
  869.   /* slider for grid interval along y axis */
  870.   slider_gridy=panel_create_item(attr_panel, PANEL_SLIDER,
  871.                PANEL_LABEL_STRING, "               y",
  872.                PANEL_VALUE, (int) GE_DEFAULT_GRID,
  873.                PANEL_MIN_VALUE, (int) GE_MIN_GRID,
  874.                PANEL_MAX_VALUE, (int) (GE_WIN_Y/10),
  875.                PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  876.                PANEL_ITEM_X, ATTR_COL(0),
  877.                PANEL_ITEM_Y, ATTR_ROW(2),
  878.                PANEL_NOTIFY_PROC, do_change_grid,
  879.                0);
  880.  
  881.   /* color slider */
  882.   slider_color=panel_create_item(attr_panel, PANEL_SLIDER,
  883.                PANEL_LABEL_STRING, "Color:",
  884.                PANEL_ITEM_X, ATTR_COL(0),
  885.                PANEL_ITEM_Y, ATTR_ROW(3),
  886.                PANEL_VALUE, 0,
  887.                PANEL_MIN_VALUE, 0,
  888.                PANEL_MAX_VALUE, 11,
  889.                PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  890.                PANEL_NOTIFY_PROC, do_change_color,
  891.                0);
  892.  
  893.   /* character size slider */
  894.   slider_charsize=panel_create_item(attr_panel, PANEL_SLIDER,
  895.                PANEL_LABEL_STRING, "Font size:",
  896.                PANEL_VALUE, (int) GE_DEFAULT_CHARSIZE,
  897.                PANEL_MIN_VALUE, 1,
  898.                PANEL_MAX_VALUE, (int) 20,
  899.                PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  900.                PANEL_ITEM_X, ATTR_COL(0),
  901.                PANEL_ITEM_Y, ATTR_ROW(4),
  902.                PANEL_NOTIFY_PROC, do_change_charsize,
  903.                0);
  904.  
  905.   /* line style menu */
  906.   menu_linestyle=panel_create_item(attr_panel, PANEL_CHOICE,
  907.                    PANEL_LABEL_STRING, "Line Style :",
  908.                    PANEL_FEEDBACK, PANEL_MARKED,
  909.                    PANEL_ITEM_X, ATTR_COL(0),
  910.                    PANEL_ITEM_Y, ATTR_ROW(5),
  911.                    PANEL_CHOICE_IMAGES, &solid_pr, &dot_pr,
  912.                                         &dash_pr, &dotdash_pr, 0,
  913.                    PANEL_CHOICE_XS,
  914.                      ATTR_COL(4),ATTR_COL(4),ATTR_COL(4),ATTR_COL(4),0,
  915.                    PANEL_CHOICE_YS,
  916.                      ATTR_ROW(7),ATTR_ROW(8),ATTR_ROW(9),ATTR_ROW(10),0,
  917.                    PANEL_MARK_XS,
  918.                      ATTR_COL(0),ATTR_COL(0),ATTR_COL(0),ATTR_COL(0),0,
  919.                    PANEL_MARK_YS,
  920.                      ATTR_ROW(7),ATTR_ROW(8),ATTR_ROW(9),ATTR_ROW(10),0,
  921.                    PANEL_NOTIFY_PROC, do_change_linestyle,
  922.                    0);
  923.  
  924.   /* font menu */
  925.   menu_font=panel_create_item(attr_panel, PANEL_CHOICE,
  926.                    PANEL_LABEL_STRING, "Font :",
  927.                    PANEL_FEEDBACK, PANEL_MARKED,
  928.                    PANEL_ITEM_X, ATTR_COL(16),
  929.                    PANEL_ITEM_Y, ATTR_ROW(5),
  930.                    PANEL_CHOICE_STRINGS, "Courier", "Roman", "Greek",
  931.                                          "BoldItalic", "Bold",0,
  932.                    PANEL_CHOICE_XS,
  933.                      ATTR_COL(20),ATTR_COL(20),ATTR_COL(20),
  934.                      ATTR_COL(20),ATTR_COL(20),0,
  935.                    PANEL_CHOICE_YS,
  936.                      ATTR_ROW(7),ATTR_ROW(8),ATTR_ROW(9),
  937.                      ATTR_ROW(10),ATTR_ROW(11),0,
  938.                    PANEL_MARK_XS,
  939.                      ATTR_COL(16),ATTR_COL(16),ATTR_COL(16),
  940.                      ATTR_COL(16),ATTR_COL(16),0,
  941.                    PANEL_MARK_YS,
  942.                      ATTR_ROW(7),ATTR_ROW(8),ATTR_ROW(9),
  943.                      ATTR_ROW(10),ATTR_ROW(11),0,
  944.                    PANEL_NOTIFY_PROC, do_change_font,
  945.                    0);
  946.  
  947.   /* grid on/off option */
  948.   cycle_grid=panel_create_item(attr_panel, PANEL_CYCLE,
  949.                PANEL_LABEL_STRING, "Grid ",
  950.                PANEL_ITEM_X, ATTR_COL(30),
  951.                PANEL_ITEM_Y, ATTR_ROW(5),
  952.                PANEL_CHOICE_STRINGS, "Off", "On", 0,
  953.                PANEL_NOTIFY_PROC, do_grid,
  954.                0);
  955.  
  956.   /* align on/off option */
  957.   cycle_align=panel_create_item(attr_panel, PANEL_CYCLE,
  958.                PANEL_LABEL_STRING, "Align",
  959.                PANEL_ITEM_X, ATTR_COL(30),
  960.                PANEL_ITEM_Y, ATTR_ROW(6),
  961.                PANEL_CHOICE_STRINGS, "Off", "On", 0,
  962.                PANEL_NOTIFY_PROC, do_align,
  963.                0);
  964.  
  965.   /* show options/options done button */
  966.   cycle_save=panel_create_item(attr_panel, PANEL_CYCLE,
  967.                PANEL_ITEM_X, ATTR_COL(30),
  968.                PANEL_ITEM_Y, ATTR_ROW(8),
  969.                PANEL_CHOICE_IMAGES,
  970.                  panel_button_image(seg_panel, "Show Options", 12,0),
  971.                  panel_button_image(seg_panel, "Options Done", 12,0),
  972.                  0,
  973.                PANEL_FEEDBACK, PANEL_NONE,
  974.                PANEL_SHOW_MENU, 0,
  975.                PANEL_NOTIFY_PROC, do_show_save,
  976.                0);
  977.  
  978.   /* fill option */
  979.   cycle_fill=panel_create_item(attr_panel, PANEL_CYCLE,
  980.                PANEL_ITEM_X, ATTR_COL(30),
  981.                PANEL_ITEM_Y, ATTR_ROW(9),
  982.                PANEL_CHOICE_IMAGES, &border_pr, &fill_pr, &borderfill_pr, 0,
  983.                0);
  984.  
  985.   window_fit(attr_panel);
  986.  
  987.   /* fit panels in frame */
  988.   window_fit(frame);
  989.  
  990.   /* adjust the width of the panels to the maximum among them */
  991.   {
  992.     int i, width, maxwidth;
  993.  
  994.     /* determine the maximum width */
  995.     width=0;
  996.     maxwidth=0;
  997.     for ( i=0; i<5; i++ ) {
  998.       width = (int) window_get(panels[i], WIN_WIDTH);
  999.       if ( width > maxwidth ) maxwidth = width;
  1000.     } /* for */
  1001.  
  1002.     /* set all of them to the maximum width */
  1003.     for ( i=0; i<5; i++ ) {
  1004.       (void) window_set(panels[i], WIN_WIDTH, maxwidth, 0);
  1005.     } /* for */
  1006.   }
  1007.  
  1008. } /* make control panel */
  1009.  
  1010. /*****************************************************************************
  1011.  
  1012.     do_message displays a message on the message panel.
  1013.  
  1014.   Input
  1015.     mesg - message to display
  1016.  
  1017. *****************************************************************************/
  1018.  
  1019. do_message(mesg)
  1020. char *mesg;
  1021. {
  1022.   panel_set(mesg_display,
  1023.     PANEL_LABEL_STRING, mesg,
  1024.     0);
  1025.  
  1026. } /* do_message */
  1027.  
  1028. /*****************************************************************************
  1029.  
  1030.     do_usage display the usage of the three mouse buttons on the message
  1031.   panel.
  1032.  
  1033.   Input
  1034.     mesg1 - message for left button
  1035.     mesg2 - message for middle button
  1036.     mesg3 - message for right button
  1037.  
  1038. *****************************************************************************/
  1039.  
  1040. do_usage(mesg1, mesg2, mesg3)
  1041. char *mesg1, *mesg2, *mesg3;
  1042. {
  1043.   static char usage[80];
  1044.  
  1045.   sprintf(usage, "L: %-11s M: %-11s R: %-11s", mesg1, mesg2, mesg3);
  1046.   panel_set(mesg_usage,
  1047.     PANEL_LABEL_STRING, usage,
  1048.     0);
  1049.  
  1050. } /* do_usage */
  1051.  
  1052. /*****************************************************************************
  1053.  
  1054.     do_show_save is the notify procedure for the show options/options done
  1055.   option.  It creates the options window if it does not exist and
  1056.   show/close the window according to the value.
  1057.  
  1058.   Input
  1059.     value - value of show options/options done option
  1060.  
  1061. *****************************************************************************/
  1062.  
  1063. static Frame save_frame=0;
  1064. void do_show_save(item, value, event)
  1065. Panel_item item;
  1066. int value;
  1067. Event *event;
  1068. {
  1069.   extern Frame base_frame;
  1070.  
  1071.   if ( ! save_frame ) {
  1072.     /* create the options window */
  1073.     save_frame = (Frame)make_save_panel(base_frame);
  1074.   }
  1075.   else {
  1076.     /* show/close options window according to value */
  1077.     window_set(save_frame,
  1078.       WIN_SHOW, value,
  1079.       0);
  1080.   } /* else */
  1081.  
  1082. } /* do_show_save */
  1083.  
  1084. /*****************************************************************************
  1085.  
  1086.     do_reset_save is the quit notify procedure for the options window.  It is
  1087.   called when the Done option is chosen from the frame menu of the window.
  1088.   It will reset the value of the show options/options done option and
  1089.   actually close the window.
  1090.  
  1091. *****************************************************************************/
  1092.  
  1093. void do_reset_save()
  1094. {
  1095.   panel_set(cycle_save,
  1096.     PANEL_VALUE, 0,
  1097.     0);
  1098.  
  1099.   /* close the window */
  1100.   window_set(save_frame,
  1101.     WIN_SHOW, 0,
  1102.     0);
  1103.  
  1104. } /* do_reset_save */
  1105. @//E*O*F panel.c//
  1106. chmod u=r,g=r,o=r panel.c
  1107.  
  1108. echo x - savepanel.c
  1109. sed 's/^@//' > "savepanel.c" <<'@//E*O*F savepanel.c//'
  1110.  
  1111. static char SccsId[] = "@(#)savepanel.c    1.1 6/8/87 Copyright 1987 SBCS-chan";
  1112.  
  1113. /*****************************************************************************
  1114.  
  1115.           (c) Copyright 1987 
  1116.  
  1117.           Lap-Tak Chan
  1118.           Computer Science Department
  1119.           State University of New York at Stony Brook
  1120.           Stony Brook, NY 11794
  1121.  
  1122.     This software and its documentation may be used, copied, and
  1123.   distributed, provided that this legend appear in all copies and
  1124.   that it is not copied or distributed for a profit.
  1125.  
  1126.   No representations is made about the suitability of this software
  1127.   for any purpose.  It is provided "as is" with no support and no
  1128.   express or implied warranty.
  1129.  
  1130. *****************************************************************************/
  1131.  
  1132. /*****************************************************************************
  1133.  
  1134.                          Options Window
  1135.                          ==============
  1136.  
  1137.     This file contains routines for the options window.
  1138.  
  1139. *****************************************************************************/
  1140.  
  1141. #include <suntool/sunview.h>
  1142. #include <suntool/panel.h>
  1143. #include "display.h"
  1144.  
  1145. /* define how the diagram is placed on 8.5 x 11 paper */
  1146. extern struct saveattr save_attr;
  1147.  
  1148. static Panel_item cycle_fix, cycle_rotate, cycle_center, 
  1149.        slider_width, slider_height, slider_offa, slider_offb;
  1150.  
  1151. /* externally accessible panel items */
  1152. Panel_item cycle_scale, cycle_blink, cycle_optm, cycle_output, cycle_newseg,
  1153.            cycle_cont, cycle_raster;
  1154.  
  1155. extern void do_change_save(), do_reset_save(), do_set_timer();
  1156.  
  1157. /* raster images */
  1158. static short norotate_pr_image[]={
  1159. #include "images/norotate.pr"
  1160. };
  1161.  
  1162. static short rotate_pr_image[]={
  1163. #include "images/rotate.pr"
  1164. };
  1165.  
  1166. mpr_static(norotate_pr, 64, 64, 1, norotate_pr_image);
  1167. mpr_static(rotate_pr, 64, 64, 1, rotate_pr_image);
  1168.  
  1169. /*****************************************************************************
  1170.  
  1171.     make_save_panel will create a new frame for the option window and create
  1172.   a save panel and an option panel.
  1173.  
  1174.   Input
  1175.     frame - parent frame
  1176.  
  1177.   Output
  1178.     Return frame created.
  1179.  
  1180. *****************************************************************************/
  1181.  
  1182. Frame
  1183. make_save_panel(frame)
  1184. Frame frame;
  1185. {
  1186.  
  1187.   Frame newframe;
  1188.   Panel panels[2];
  1189. #define save_panel    panels[0]
  1190. #define option_panel    panels[1]
  1191.  
  1192.   /* create a new frame under parent frame */
  1193.   newframe=window_create(frame, FRAME,
  1194.                          WIN_SHOW,TRUE,
  1195.                          FRAME_DONE_PROC, do_reset_save,
  1196.                          0);
  1197.  
  1198.   /* create save panel */
  1199.   save_panel=window_create(newframe, PANEL,
  1200.                0);
  1201.  
  1202.   /* slider for w */
  1203.   slider_width=panel_create_item(save_panel, PANEL_SLIDER,
  1204.              PANEL_LABEL_STRING, "w",
  1205.              PANEL_VALUE, save_attr.width,
  1206.              PANEL_MIN_VALUE, 10,
  1207.              PANEL_MAX_VALUE, 75,
  1208.              PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  1209.              PANEL_ITEM_X, ATTR_COL(0),
  1210.              PANEL_ITEM_Y, ATTR_ROW(0),
  1211.              PANEL_NOTIFY_PROC, do_change_save,
  1212.              0);
  1213.  
  1214.   /* slider for h */
  1215.   slider_height=panel_create_item(save_panel, PANEL_SLIDER,
  1216.              PANEL_LABEL_STRING, "h",
  1217.              PANEL_VALUE, save_attr.height,
  1218.              PANEL_MIN_VALUE, 10,
  1219.              PANEL_MAX_VALUE, 100,
  1220.              PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  1221.              PANEL_ITEM_X, ATTR_COL(0),
  1222.              PANEL_ITEM_Y, ATTR_ROW(1),
  1223.              PANEL_NOTIFY_PROC, do_change_save,
  1224.              0);
  1225.  
  1226.   /* slider for a */
  1227.   slider_offa=panel_create_item(save_panel, PANEL_SLIDER,
  1228.              PANEL_LABEL_STRING, "a",
  1229.              PANEL_VALUE, save_attr.offa,
  1230.              PANEL_MIN_VALUE, 5,
  1231.              PANEL_MAX_VALUE, 85-save_attr.width,
  1232.              PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  1233.              PANEL_ITEM_X, ATTR_COL(0),
  1234.              PANEL_ITEM_Y, ATTR_ROW(2),
  1235.              PANEL_NOTIFY_PROC, do_change_save,
  1236.              PANEL_SHOW_ITEM, ! save_attr.center,
  1237.              0);
  1238.  
  1239.   /* slider for b */
  1240.   slider_offb=panel_create_item(save_panel, PANEL_SLIDER,
  1241.              PANEL_LABEL_STRING, "b",
  1242.              PANEL_VALUE, save_attr.offb,
  1243.              PANEL_MIN_VALUE, 5,
  1244.              PANEL_MAX_VALUE, 110-save_attr.height,
  1245.              PANEL_SLIDER_WIDTH, ATTR_COLS(15),
  1246.              PANEL_ITEM_X, ATTR_COL(0),
  1247.              PANEL_ITEM_Y, ATTR_ROW(3),
  1248.              PANEL_NOTIFY_PROC, do_change_save,
  1249.              PANEL_SHOW_ITEM, ! save_attr.center,
  1250.              0);
  1251.  
  1252.   /* just a message on the panel */
  1253.   (void)panel_create_item(save_panel, PANEL_MESSAGE,
  1254.              PANEL_LABEL_STRING, "Lengths in 1/10\"",
  1255.              PANEL_ITEM_X, ATTR_COL(0),
  1256.              PANEL_ITEM_Y, ATTR_ROW(4),
  1257.              0);
  1258.  
  1259.   /* scale/fix width/fix height option */
  1260.   cycle_fix=panel_create_item(save_panel, PANEL_CYCLE,
  1261.              PANEL_VALUE, save_attr.fix,
  1262.              PANEL_ITEM_X, ATTR_COL(0),
  1263.              PANEL_ITEM_Y, ATTR_ROW(6),
  1264.              PANEL_CHOICE_STRINGS, "Scale", "Fix Width", "Fix Height", 0,
  1265.              PANEL_NOTIFY_PROC, do_change_save,
  1266.              0);
  1267.  
  1268.   /* center/offset option */
  1269.   cycle_center=panel_create_item(save_panel, PANEL_CYCLE,
  1270.              PANEL_VALUE, save_attr.center,
  1271.              PANEL_ITEM_X, ATTR_COL(0),
  1272.              PANEL_ITEM_Y, ATTR_ROW(7),
  1273.              PANEL_CHOICE_STRINGS, "Offset a,b", "Center", 0,
  1274.              PANEL_NOTIFY_PROC, do_change_save,
  1275.              0);
  1276.  
  1277.   /* rotate option */
  1278.   cycle_rotate=panel_create_item(save_panel, PANEL_CYCLE,
  1279.              PANEL_VALUE, save_attr.rotate,
  1280.              PANEL_ITEM_X, ATTR_COL(16),
  1281.              PANEL_ITEM_Y, ATTR_ROW(4),
  1282.              PANEL_CHOICE_IMAGES, &norotate_pr, &rotate_pr, 0,
  1283.              PANEL_NOTIFY_PROC, do_change_save,
  1284.              0);
  1285.  
  1286.   window_fit(save_panel);
  1287.  
  1288.   /* create option panel */
  1289.   option_panel=window_create(newframe, PANEL,
  1290.                WIN_BELOW, save_panel,
  1291.                WIN_X, ATTR_COLS(0),
  1292.                0);
  1293.  
  1294.   /* auto create option */
  1295.   cycle_newseg=panel_create_item(option_panel, PANEL_CYCLE,
  1296.                PANEL_LABEL_STRING, "Auto Create           ",
  1297.                PANEL_ITEM_X, ATTR_COL(0),
  1298.                PANEL_ITEM_Y, ATTR_ROW(0),
  1299.                PANEL_CHOICE_STRINGS, "Off", "On", 0,
  1300.                0);
  1301.  
  1302.   /* continous option */
  1303.   cycle_cont=panel_create_item(option_panel, PANEL_CYCLE,
  1304.              PANEL_LABEL_STRING, "Continous             ",
  1305.              PANEL_ITEM_X, ATTR_COL(0),
  1306.              PANEL_ITEM_Y, ATTR_ROW(1),
  1307.              PANEL_CHOICE_STRINGS, "No", "Yes", 0,
  1308.              0);
  1309.  
  1310.   /* proportional scale option */
  1311.   cycle_scale=panel_create_item(option_panel, PANEL_CYCLE,
  1312.              PANEL_LABEL_STRING, "Proportional Scale    ",
  1313.              PANEL_ITEM_X, ATTR_COL(0),
  1314.              PANEL_ITEM_Y, ATTR_ROW(2),
  1315.              PANEL_CHOICE_STRINGS, "No", "Yes", 0,
  1316.              0);
  1317.  
  1318.   /* blink current segment option */
  1319.   cycle_blink=panel_create_item(option_panel, PANEL_CYCLE,
  1320.              PANEL_LABEL_STRING, "Blink Current Segment ",
  1321.              PANEL_VALUE, 1,
  1322.              PANEL_ITEM_X, ATTR_COL(0),
  1323.              PANEL_ITEM_Y, ATTR_ROW(3),
  1324.              PANEL_CHOICE_STRINGS, "No", "Yes", 0,
  1325.              PANEL_NOTIFY_PROC, do_set_timer,
  1326.              0);
  1327.  
  1328.   /* optimize option */
  1329.   cycle_optm=panel_create_item(option_panel, PANEL_CYCLE,
  1330.              PANEL_LABEL_STRING, "Optimize before Save  ",
  1331.              PANEL_VALUE,1,
  1332.              PANEL_ITEM_X, ATTR_COL(0),
  1333.              PANEL_ITEM_Y, ATTR_ROW(4),
  1334.              PANEL_CHOICE_STRINGS, "No", "Yes", 0,
  1335.              0);
  1336.  
  1337.   /* output format option */
  1338.   cycle_output=panel_create_item(option_panel, PANEL_CYCLE,
  1339.              PANEL_LABEL_STRING, "Output Format         ",
  1340.              PANEL_ITEM_X, ATTR_COL(0),
  1341.              PANEL_ITEM_Y, ATTR_ROW(5),
  1342.              PANEL_CHOICE_STRINGS, "Raster", "Pic", "Plot", 0,
  1343.              0);
  1344.  
  1345.   /* select raster area option */
  1346.   cycle_raster=panel_create_item(option_panel, PANEL_CYCLE,
  1347.              PANEL_LABEL_STRING, "Select Area for Raster",
  1348.              PANEL_ITEM_X, ATTR_COL(0),
  1349.              PANEL_ITEM_Y, ATTR_ROW(6),
  1350.              PANEL_CHOICE_STRINGS, "No", "Yes", 0,
  1351.              0);
  1352.  
  1353.   window_fit(option_panel);
  1354.   window_fit(newframe);
  1355.  
  1356.   /* adjust both panels to the width of the wider panel */
  1357.   {
  1358.     int i, width, maxwidth;
  1359.  
  1360.     /* determine the maximum width */
  1361.     width=0;
  1362.     maxwidth=0;
  1363.     for ( i=0; i<2; i++ ) {
  1364.       width = (int) window_get(panels[i], WIN_WIDTH);
  1365.       if ( width > maxwidth ) maxwidth = width;
  1366.     } /* for */
  1367.  
  1368.     /* set both panels to the maximum */
  1369.     for ( i=0; i<2; i++ ) {
  1370.       (void) window_set(panels[i], WIN_WIDTH, maxwidth, 0);
  1371.     } /* for */
  1372.   }
  1373.  
  1374.   return(newframe);
  1375.  
  1376. } /* make_save_panel */
  1377.  
  1378. /*****************************************************************************
  1379.  
  1380.     do_change_save is the notify procedure of all the options on the save
  1381.   panel.  It updates the corresponding value in save_attr and change
  1382.   the setting of other options accordingly.
  1383.  
  1384.   Input
  1385.     item - panel item changed
  1386.     value - new value of panel item
  1387.  
  1388. *****************************************************************************/
  1389.  
  1390. void
  1391. do_change_save(item, value, event)
  1392. Panel_item item;
  1393. int value;
  1394. Event *event;
  1395. {
  1396.   if ( item == cycle_fix ) {
  1397.     /* scale/fix width/fix height option */
  1398.     save_attr.fix = value;
  1399.  
  1400.     /* disable slider for h when fix width */
  1401.     panel_set(slider_width,
  1402.       PANEL_SHOW_ITEM, ( (value == 0) || (value == 1) ),
  1403.       0);
  1404.  
  1405.     /* disable slider for w when fix height */
  1406.     panel_set(slider_height,
  1407.       PANEL_SHOW_ITEM, ( (value == 0) || (value == 2) ),
  1408.       0);
  1409.   }
  1410.  
  1411.   if ( item == cycle_rotate )
  1412.     /* rotate option */
  1413.     save_attr.rotate = value;
  1414.  
  1415.   if ( item == cycle_center ) {
  1416.     /* center/offset option */
  1417.     save_attr.center = value;
  1418.  
  1419.     /* disable slider for a and b when center */
  1420.     panel_set(slider_offa,
  1421.       PANEL_SHOW_ITEM, ! value,
  1422.       0);
  1423.     panel_set(slider_offb,
  1424.       PANEL_SHOW_ITEM, ! value,
  1425.       0);
  1426.   }
  1427.  
  1428.   if ( item == slider_width ) {
  1429.     int maxoffa;
  1430.  
  1431.     save_attr.width = value;
  1432.     /* adjust maximum offset a */
  1433.     maxoffa=85-value;
  1434.     panel_set(slider_offa,
  1435.               PANEL_MAX_VALUE, maxoffa,
  1436.               0);
  1437.  
  1438.     /* reduce offset a if it is larger than maximum */
  1439.     if ( save_attr.offa > maxoffa ) {
  1440.       panel_set(slider_offa,
  1441.                 PANEL_VALUE, maxoffa,
  1442.                 0);
  1443.       save_attr.offa = maxoffa;
  1444.     }
  1445.   }
  1446.  
  1447.   if ( item == slider_height ) {
  1448.     int maxoffb;
  1449.  
  1450.     save_attr.height = value;
  1451.  
  1452.     /* adjust maximum offset b */
  1453.     maxoffb=110-value;
  1454.     panel_set(slider_offb,
  1455.               PANEL_MAX_VALUE, maxoffb,
  1456.               0);
  1457.  
  1458.     /* reduce offset b when larger than maximum */
  1459.     if ( save_attr.offb > maxoffb ) {
  1460.       panel_set(slider_offb,
  1461.                 PANEL_VALUE, maxoffb,
  1462.                 0);
  1463.       save_attr.offb = maxoffb;
  1464.     }
  1465.   }
  1466.  
  1467.   if ( item == slider_offa )
  1468.     save_attr.offa = value;
  1469.  
  1470.   if ( item == slider_offb )
  1471.     save_attr.offb = value;
  1472.  
  1473. } /* do_change_save */
  1474. @//E*O*F savepanel.c//
  1475. chmod u=r,g=r,o=r savepanel.c
  1476.  
  1477. echo Inspecting for damage in transit...
  1478. temp=/tmp/shar$$; dtemp=/tmp/.shar$$
  1479. trap "rm -f $temp $dtemp; exit" 0 1 2 3 15
  1480. cat > $temp <<\!!!
  1481.       80     463    3462 README
  1482.       89     353    2663 Makefile
  1483.      126     695    4492 display.h
  1484.      745    1672   24557 panel.c
  1485.      364     955   10974 savepanel.c
  1486.     1404    4138   46148 total
  1487. !!!
  1488. wc  README Makefile display.h panel.c savepanel.c | sed 's=[^ ]*/==' | diff -b $temp - >$dtemp
  1489. if [ -s $dtemp ]
  1490. then echo "Ouch [diff of wc output]:" ; cat $dtemp
  1491. else echo "No problems found."
  1492. fi
  1493. exit 0
  1494.  
  1495.  
  1496.  
  1497.  
  1498.